﻿
Partial Class WebForm_CommonControl_FormToolBar
    Inherits System.Web.UI.UserControl

    Protected Sub btnAdd_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnAdd.Click
        'Me.mv.SetActiveView(Me.vwList)
        RaiseEvent Adding(Me, New EventArgs)
    End Sub

    Protected Sub btnList_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnList.Click
        'Me.mv.SetActiveView(Me.vwAdd)
        RaiseEvent Searching(Me, New EventArgs)
    End Sub
End Class

Partial Class WebForm_CommonControl_FormToolBar
    Public Property AddButtonVisible() As Boolean
        Get
            Return Me.btnAdd.Visible
        End Get
        Set(ByVal value As Boolean)
            Me.btnAdd.Visible = value
        End Set
    End Property

    Public WriteOnly Property AddButtonText() As String
        Set(ByVal value As String)
            Me.btnAdd.Text = value
        End Set
    End Property

    Public Event Adding(ByVal source As Object, ByVal e As EventArgs)
    Public Event Searching(ByVal source As Object, ByVal e As EventArgs)
End Class